home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Muzyka / Edytory sampli (probek dzwieku) / ZynAddSubFX_2.2.0 / Setup_ZynAddSubFX-2.2.0.exe / source code / UI / SeqUI.fl < prev    next >
Text File  |  2005-03-14  |  2KB  |  74 lines
  1. # data file for the Fltk User Interface Designer (fluid)
  2. version 1.0105 
  3. header_name {.h} 
  4. code_name {.cc}
  5. decl {//Copyright (c) 2002-2005 Nasca Octavian Paul} {} 
  6.  
  7. decl {//License: GNU GPL version 2} {} 
  8.  
  9. decl {\#include "../globals.h"} {public
  10. } 
  11.  
  12. decl {\#include "../Misc/Master.h"} {public
  13. } 
  14.  
  15. decl {\#include "WidgetPDial.h"} {public
  16. } 
  17.  
  18. class SeqUI {} {
  19.   Function {make_window()} {} {
  20.     Fl_Window seqwin {
  21.       label {Sequencer - ZynAddSubFX}
  22.       xywh {104 235 280 265} type Double hide
  23.     } {
  24.       Fl_Group {} {
  25.         label Player
  26.         xywh {120 20 100 65} box ENGRAVED_BOX labelfont 1
  27.       } {
  28.         Fl_Button playbutton {
  29.           label Play
  30.           callback {o->deactivate();
  31. stopbutton_play->activate();
  32.  
  33. master->seq.startplay();}
  34.           tooltip {Start Playing} xywh {130 30 30 30} box DIAMOND_UP_BOX color 79 labelfont 1 labelsize 16 align 2
  35.         }
  36.         Fl_Button stopbutton_play {
  37.           label Stop
  38.           callback {o->deactivate();
  39. playbutton->activate();
  40.  
  41. master->seq.stopplay();}
  42.           tooltip {Stop Playing} xywh {175 29 30 31} box THIN_UP_BOX color 4 labelfont 1 labelsize 16 align 2 deactivate
  43.         }
  44.       }
  45.       Fl_Button {} {
  46.         label {Open test.mid}
  47.         callback {master->seq.importmidifile("test.mid");}
  48.         xywh {20 25 75 55} align 128
  49.       }
  50.       Fl_Value_Slider {} {
  51.         label {Play speed}
  52.         callback {master->seq.setplayspeed((int) o->value());}
  53.         xywh {15 105 190 20} type {Horz Knob} minimum -128 maximum 128 step 1
  54.         code0 {o->value(master->seq.playspeed);}
  55.       }
  56.       Fl_Box {} {
  57.         label {This is not finished} selected
  58.         xywh {25 155 225 90} labelfont 1 labelsize 30 align 128
  59.       }
  60.     }
  61.   }
  62.   Function {SeqUI(Master *master_)} {open
  63.   } {
  64.     code {master=master_;
  65.  
  66. make_window();} {}
  67.   }
  68.   decl {Master *master} {}
  69.   Function {show()} {open
  70.   } {
  71.     code {seqwin->show();} {}
  72.   }
  73. } 
  74.